home *** CD-ROM | disk | FTP | other *** search
/ Art Fundamentals - Core Concepts in Art / Art Fundamentals: Core Concepts in Art.iso / pc / color.dxr / 00478.ls < prev    next >
Encoding:
Text File  |  2001-07-16  |  2.3 KB  |  104 lines
  1. on exitFrame me
  2.   global X, Y, squarecolor
  3.   homebackroll()
  4.   exerciseroll()
  5.   finger(2, 2)
  6.   finger(5, 5)
  7.   finger(18, 20)
  8.   unfinger(30, 32)
  9.   unfinger(37, 48)
  10.   finger(49, 67)
  11.   unfinger(68, 98)
  12.   finger(113, 118)
  13.   finger(123, 123)
  14.   finger(185, 187)
  15.   finger(192, 192)
  16.   finger(195, 195)
  17.   finger(198, 198)
  18.   set the floatPrecision to 0
  19.   if squarecolor = "red" then
  20.     put "0¬∞" into field "h field"
  21.   else
  22.     if squarecolor = "yellow" then
  23.       put "300¬∞" into field "h field"
  24.     else
  25.       if squarecolor = "green" then
  26.         put "240¬∞" into field "h field"
  27.       else
  28.         if squarecolor = "cyan" then
  29.           put "180¬∞" into field "h field"
  30.         else
  31.           if squarecolor = "blue" then
  32.             put "120¬∞" into field "h field"
  33.           else
  34.             if squarecolor = "purple" then
  35.               put "60¬∞" into field "h field"
  36.             end if
  37.           end if
  38.         end if
  39.       end if
  40.     end if
  41.   end if
  42.   if ((255 - (X * 15)) / 2.54999999999999982) = 100 then
  43.     set the blend of sprite 35 to 50
  44.     unfinger(35, 35)
  45.   else
  46.     set the blend of sprite 35 to 100
  47.     finger(35, 35)
  48.   end if
  49.   if ((255 - (X * 15)) / 2.54999999999999982) = 0 then
  50.     set the blend of sprite 34 to 50
  51.     unfinger(34, 34)
  52.   else
  53.     set the blend of sprite 34 to 100
  54.     finger(34, 34)
  55.   end if
  56.   if (Y * 15 / 2.54999999999999982) = 100 then
  57.     set the blend of sprite 33 to 50
  58.     unfinger(33, 33)
  59.   else
  60.     set the blend of sprite 33 to 100
  61.     finger(33, 33)
  62.   end if
  63.   if (Y * 15 / 2.54999999999999982) = 0 then
  64.     set the blend of sprite 36 to 50
  65.     unfinger(36, 36)
  66.   else
  67.     set the blend of sprite 36 to 100
  68.     finger(36, 36)
  69.   end if
  70.   if Y < 3 then
  71.     showit(31, 31)
  72.   else
  73.     hideit(31, 31)
  74.   end if
  75.   showit(40, 42)
  76.   hideit(49, 54)
  77.   if rollover(43) then
  78.     sprite(49).visible = 1
  79.   else
  80.     if rollover(44) then
  81.       sprite(50).visible = 1
  82.     else
  83.       if rollover(45) then
  84.         sprite(51).visible = 1
  85.       else
  86.         if rollover(46) then
  87.           sprite(52).visible = 1
  88.         else
  89.           if rollover(47) then
  90.             sprite(53).visible = 1
  91.           else
  92.             if rollover(48) then
  93.               sprite(54).visible = 1
  94.             else
  95.               hideit(49, 54)
  96.             end if
  97.           end if
  98.         end if
  99.       end if
  100.     end if
  101.   end if
  102.   go(the frame)
  103. end
  104.